/ Macwelt 3 / Macwelt DVD 3.cdr / Audio / VC / Scripts / Play AIFFs in Folder

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 14 50 6c 61 79 20 41 | 49 46 46 73 20 69 6e 20 |..Play A|IFFs in |
|00000010| 46 6f 6c 64 65 72 00 00 | 00 00 00 00 00 00 00 00 |Folder..|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 54 6f 79 | 53 00 00 ff ff ff ff 00 |.TEXTToy|S.......|
|00000050| 00 00 00 00 00 02 ff 00 | 00 02 66 b8 33 97 c5 b8 |........|..f.3...|
|00000060| 33 97 c5 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |3.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 5a a3 00 00 |........|....Z...|
|00000080| 2d 2d 20 45 69 74 68 65 | 72 20 73 65 74 20 74 68 |-- Eithe|r set th|
|00000090| 65 20 63 6f 72 72 65 63 | 74 20 70 61 74 68 6e 61 |e correc|t pathna|
|000000a0| 6d 65 20 62 65 6c 6f 77 | 20 6f 72 20 6c 65 61 76 |me below| or leav|
|000000b0| 65 20 69 74 20 61 73 20 | 69 74 20 69 73 2c 0d 2d |e it as |it is,.-|
|000000c0| 2d 20 69 6e 20 77 68 69 | 63 68 20 63 61 73 65 20 |- in whi|ch case |
|000000d0| 74 68 65 20 73 63 72 69 | 70 74 20 77 69 6c 6c 20 |the scri|pt will |
|000000e0| 61 73 6b 20 79 6f 75 20 | 66 6f 72 20 61 20 66 6f |ask you |for a fo|
|000000f0| 6c 64 65 72 20 6e 61 6d | 65 2e 0d 2d 2d 20 28 53 |lder nam|e..-- (S|
|00000100| 63 72 69 70 74 20 63 6f | 75 72 74 65 73 79 20 6f |cript co|urtesy o|
|00000110| 66 20 45 72 69 63 20 47 | 72 61 6e 74 29 0d 70 72 |f Eric G|rant).pr|
|00000120| 6f 70 65 72 74 79 20 70 | 6c 61 79 46 6f 6c 64 65 |operty p|layFolde|
|00000130| 72 20 3a 20 22 22 0d 0d | 69 66 20 70 6c 61 79 46 |r : ""..|if playF|
|00000140| 6f 6c 64 65 72 20 69 73 | 20 22 22 20 74 68 65 6e |older is| "" then|
|00000150| 20 73 65 74 20 70 6c 61 | 79 46 6f 6c 64 65 72 20 | set pla|yFolder |
|00000160| 74 6f 20 28 63 68 6f 6f | 73 65 20 66 6f 6c 64 65 |to (choo|se folde|
|00000170| 72 20 77 69 74 68 20 70 | 72 6f 6d 70 74 20 22 53 |r with p|rompt "S|
|00000180| 65 6c 65 63 74 20 74 68 | 65 20 66 6f 6c 64 65 72 |elect th|e folder|
|00000190| 20 74 6f 20 70 6c 61 79 | 3a 22 29 0d 2d 2d 20 74 | to play|:").-- t|
|000001a0| 68 65 20 61 6c 69 61 73 | 20 69 73 20 73 61 76 65 |he alias| is save|
|000001b0| 64 20 61 73 20 61 20 70 | 72 6f 70 65 72 74 79 20 |d as a p|roperty |
|000001c0| 61 6e 64 20 77 69 6c 6c | 20 62 65 20 74 68 65 72 |and will| be ther|
|000001d0| 65 20 6e 65 78 74 20 74 | 69 6d 65 0d 0d 74 65 6c |e next t|ime..tel|
|000001e0| 6c 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 22 56 |l applic|ation "V|
|000001f0| 69 72 74 75 61 6c 20 43 | 6f 6d 70 6f 73 65 72 22 |irtual C|omposer"|
|00000200| 0d 09 61 63 74 69 76 61 | 74 65 0d 09 2d 2d 20 67 |..activa|te..-- g|
|00000210| 65 74 20 74 68 65 20 70 | 61 74 68 6e 61 6d 65 20 |et the p|athname |
|00000220| 61 73 20 22 66 6f 6c 64 | 65 72 53 74 72 69 6e 67 |as "fold|erString|
|00000230| 22 0d 09 73 65 74 20 66 | 6f 6c 64 65 72 53 74 72 |"..set f|olderStr|
|00000240| 69 6e 67 20 74 6f 20 70 | 6c 61 79 46 6f 6c 64 65 |ing to p|layFolde|
|00000250| 72 20 61 73 20 73 74 72 | 69 6e 67 0d 09 2d 2d 20 |r as str|ing..-- |
|00000260| 6e 6f 77 20 69 74 65 72 | 61 74 65 20 74 68 72 6f |now iter|ate thro|
|00000270| 75 67 68 20 74 68 65 20 | 66 6f 6c 64 65 72 27 73 |ugh the |folder's|
|00000280| 20 63 6f 6e 74 65 6e 74 | 73 2c 0d 09 2d 2d 20 62 | content|s,..-- b|
|00000290| 75 74 20 6f 6e 6c 79 20 | 70 69 63 6b 20 74 68 65 |ut only |pick the|
|000002a0| 20 66 69 6c 65 73 20 74 | 68 61 74 20 65 6e 64 20 | files t|hat end |
|000002b0| 69 6e 20 22 2e 61 69 66 | 22 0d 09 72 65 70 65 61 |in ".aif|"..repea|
|000002c0| 74 20 77 69 74 68 20 61 | 46 69 6c 65 20 69 6e 20 |t with a|File in |
|000002d0| 6c 69 73 74 20 66 6f 6c | 64 65 72 20 70 6c 61 79 |list fol|der play|
|000002e0| 46 6f 6c 64 65 72 0d 09 | 09 69 66 20 28 28 61 46 |Folder..|.if ((aF|
|000002f0| 69 6c 65 20 61 73 20 74 | 65 78 74 29 20 63 6f 6e |ile as t|ext) con|
|00000300| 74 61 69 6e 73 20 22 2e | 61 69 66 22 29 20 74 68 |tains ".|aif") th|
|00000310| 65 6e 0d 09 09 09 73 65 | 74 20 74 68 65 46 69 6c |en....se|t theFil|
|00000320| 65 20 74 6f 20 28 61 20 | 72 65 66 65 72 65 6e 63 |e to (a |referenc|
|00000330| 65 20 74 6f 20 66 69 6c | 65 20 28 66 6f 6c 64 65 |e to fil|e (folde|
|00000340| 72 53 74 72 69 6e 67 20 | 26 20 61 46 69 6c 65 29 |rString |& aFile)|
|00000350| 29 0d 09 09 09 70 6c 61 | 79 20 74 68 65 46 69 6c |)....pla|y theFil|
|00000360| 65 0d 09 09 65 6e 64 20 | 69 66 0d 09 65 6e 64 20 |e...end |if..end |
|00000370| 72 65 70 65 61 74 0d 65 | 6e 64 20 74 65 6c 6c 00 |repeat.e|nd tell.|
|00000380| 00 00 01 00 00 00 02 0c | 00 00 01 0c 00 00 00 5a |........|.......Z|
|00000390| 19 62 1e 4f 1e 42 21 90 | 21 83 24 d4 24 c5 27 ae |.b.O.B!.|!.$.$.'.|
|000003a0| 27 9e 28 e9 28 d9 29 be | 29 ad 2a 92 2a 81 2a 2e |'.(.(.).|).*.*.*.|
|000003b0| 14 50 6c 61 79 20 41 49 | 46 46 73 20 69 6e 20 46 |.Play AI|FFs in F|
|000003c0| 6f 6c 64 65 72 46 02 00 | 00 00 54 45 58 54 54 6f |olderF..|..TEXTTo|
|000003d0| 00 00 54 45 58 54 54 6f | 79 53 01 00 ff ff ff ff |..TEXTTo|yS......|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 b7 ce d6 87 00 00 | 02 ff 00 00 02 66 eb d4 |........|.....f..|
|00000400| eb d5 eb 06 eb 07 e9 66 | e9 68 e9 64 e9 66 e7 c2 |.......f|.h.d.f..|
|00000410| e7 c3 e7 bd e7 bf e9 5b | e9 5d ea 8f ea 91 ed 64 |.......[|.].....d|
|00000420| ed 65 ef d3 ef d4 f3 0f | f3 10 f5 e5 f5 e5 f6 47 |.e......|.......G|
|00000430| f6 48 f7 15 f7 15 f9 84 | f9 85 fa 52 fa 53 fb f3 |.H......|...R.S..|
|00000440| fb f4 fd 93 fd 93 ff 34 | ff 34 00 6c 00 6c 02 0c |.......4|.4.l.l..|
|00000450| 02 0c 03 ab 03 aa 04 10 | 04 10 03 a4 03 a4 02 00 |........|........|
|00000460| 02 00 fe b9 fe b9 fb db | fb db f6 f4 f6 f5 f2 0d |........|........|
|00000470| f2 0f ed 91 ed 93 ea 4c | ea 4f e6 37 e6 3b e3 5a |.......L|.O.7.;.Z|
|00000480| 00 00 00 c2 50 6c 61 79 | 20 41 49 46 46 73 20 69 |....Play| AIFFs i|
|00000490| 6e 20 46 6f 6c 64 65 72 | 3a 20 54 68 69 73 20 69 |n Folder|: This i|
|000004a0| 73 20 61 6e 20 65 78 61 | 6d 70 6c 65 20 6f 66 20 |s an exa|mple of |
|000004b0| 68 6f 77 20 74 6f 20 70 | 6c 61 79 20 61 20 66 6f |how to p|lay a fo|
|000004c0| 6c 64 65 72 27 73 20 41 | 49 46 46 20 66 69 6c 65 |lder's A|IFF file|
|000004d0| 73 2e 20 54 68 65 20 73 | 63 72 69 70 74 20 69 74 |s. The s|cript it|
|000004e0| 65 72 61 74 65 73 20 74 | 68 65 20 66 6f 6c 64 65 |erates t|he folde|
|000004f0| 72 27 73 20 63 6f 6e 74 | 65 6e 74 73 20 61 6e 64 |r's cont|ents and|
|00000500| 20 70 69 63 6b 73 20 6f | 6e 6c 79 20 74 68 65 20 | picks o|nly the |
|00000510| 41 49 46 46 20 66 69 6c | 65 73 20 62 79 20 61 73 |AIFF fil|es by as|
|00000520| 73 75 6d 69 6e 67 20 74 | 68 61 74 20 74 68 65 69 |suming t|hat thei|
|00000530| 72 20 6e 61 6d 65 73 20 | 65 6e 64 20 69 6e 20 22 |r names |end in "|
|00000540| 2e 61 69 66 22 2e 00 00 | 00 2a 00 02 00 00 00 00 |.aif"...|.*......|
|00000550| 00 0e 00 0a 00 10 05 00 | 00 0c 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 14 00 0e 00 0a | 00 10 00 00 00 0c 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 14 | 00 2f 00 0a 01 d3 02 6e |........|./.....n|
|00000580| 00 2f 00 07 01 c4 02 58 | 00 00 00 00 00 00 01 00 |./.....X|........|
|00000590| 00 00 02 0c 00 00 01 0c | 00 00 00 5a 03 88 8e 9c |........|...Z....|
|000005a0| 1f 96 00 00 00 1c 00 5a | 00 02 54 45 58 54 00 00 |.......Z|..TEXT..|
|000005b0| 00 1a 73 74 79 6c 00 00 | 00 26 57 50 6f 73 00 00 |..styl..|.&WPos..|
|000005c0| 00 32 04 68 ff ff 00 00 | 00 00 03 88 8a a0 04 68 |.2.h....|.......h|
|000005d0| ff ff 00 00 00 c6 03 88 | 8b dc 00 80 ff ff 00 00 |........|........|
|000005e0| 00 f4 03 88 8b a0 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+